unit UConstante;

interface

type
  TStatus         = (ST_BROWSE, ST_INSERT, ST_EDIT);
const
  ST_OK                         = '001';
  ST_PENDENTE                   = '002';
  ST_CANCELADO                  = '003';

  ST_ATIVO                      = 'ATV';
  ST_INATIVO                    = 'ITV';

implementation

end.
